(setup-8-bit-environment): Set default value of default-input-method.

diff --git a/lisp/language/european.el b/lisp/language/european.el
index 0de16edb85be78e0a78d839a6393066ad684c655..86aed5f3c692def3d531b62c161425f507694053 100644 (file)
--- a/lisp/language/european.el
+++ b/lisp/language/european.el
@@ -57,7 +57,9 @@
        (setq nonascii-insert-offset nonascii-offset)))
 
   (if input-method
-      (setq default-input-method input-method))
+      (progn
+       (setq default-input-method input-method)
+       (setq-default default-input-method input-method)))
 
   ;; If this is a Latin-N character set, set up syntax for it in
   ;; single-byte mode.